-- true/false defn
FALSE = 0
TRUE = 1

-- condition return values
CONDITION_NOT_YET_MET = 0
CONDITION_SUCCEEDED = 1
CONDITION_FAILED = 2

-- Message types
MT_INFO = 0   -- large centre screen pop up
MT_ALERT = 1  -- top right alert message

MSG_TOP = 1
MSG_VCENTRE = 2
MSG_BOTTOM = 4
MSG_LEFT = 8
MSG_CENTRE = 16
MSG_RIGHT = 32

MSG_SMALL = 0
MSG_REG = 1
MSG_LRG = 2

function OnEvent(event)
    return _G["OnEvent" .. event]();
end

function TestCondition(condition)
    return _G["TestCondition" .. event]();
end

function OnEventStart()
    SysCall("ScenarioManager:LockControls")
    SysCall("CameraManager:ActivateCamera", "Camera", 0)
 SysCall("ScenarioManager:TriggerDeferredEvent", "WelcomeMessage", 15)
end


function OnEventWelcomeMessage()
 SysCall("CameraManager:ActivateCamera", "CabCamera", 0)
 SysCall("ScenarioManager:ShowInfoMessageExt", "7th May 1960", "1055 Darlington - Tebay (Barnard Castle - Tebay)", 10, 0, 0, TRUE)
 SysCall("ScenarioManager:TriggerDeferredEvent", "Unlock", 1)
end

function OnEventUnlock()
 SysCall("ScenarioManager:UnlockControls")
end